(GET_TRANSLATION_TABLE): Use XCDR.

diff --git a/src/charset.h b/src/charset.h
index fe97b417cff25c190a87bef86cf6d42e654f095a..ed5b3a7d2cf35fa2b50533e3cd18a0bc5a65332c 100644 (file)
--- a/src/charset.h
+++ b/src/charset.h
@@ -884,7 +884,7 @@ extern Lisp_Object Vtranslation_table_vector;
 
 /* Return a translation table of id number ID.  */
 #define GET_TRANSLATION_TABLE(id) \
-  (XCONS(XVECTOR(Vtranslation_table_vector)->contents[(id)])->cdr)
+  (XCDR(XVECTOR(Vtranslation_table_vector)->contents[(id)]))
 
 /* A char-table for characters which may invoke auto-filling.  */
 extern Lisp_Object Vauto_fill_chars;